home *** CD-ROM | disk | FTP | other *** search
/ Software 2000 / Software 2000 Volume 1 (Disc 2 of 2).iso / magicwb / magicwb-aga / unpack magicwb < prev   
Encoding:
Text File  |  1978-01-09  |  2.2 KB  |  67 lines
  1. failat 21
  2.  
  3. echo "*n*n*e[1;32m _____________________________________________________________________"
  4. echo " *e[43m                                                                     *e[0m"
  5. echo " *e[0;32;43m                  Welcome to MagicWB v1.0: UNPACK*e[1m                    *e[0m"
  6. echo " *e[1;4;43m                                                                     *e[0m"
  7. echo "*n*n*n You have activated the MagicWB Unpack Utility. This utility will NOT"
  8. echo " INSTALL MagicWB to your HardDisk. It will just UNPACK MagicWB to your"
  9. echo " HardDisk. Once it is unpacked you can go into the MagicWB directory"
  10. echo " and activate the Installer to install MagicWB.*n"
  11. echo " MagicWB had to be packed because otherwise it would not have fit on"
  12. echo " a normal disk. Make sure that you have got at least 1.1 MB free space"
  13. echo " on your HardDisk to unpack MagicWB!*n"
  14. echo noline "*n Would you like to unpack MagicWB? "
  15. set > NIL: InpVar ?
  16.  
  17. if $InpVar eq "ja"
  18.   skip start
  19. endif
  20.  
  21. if $InpVar eq "j"
  22.   skip start
  23. endif
  24.  
  25. if $InpVar eq "yes"
  26.   skip start
  27. endif
  28.  
  29. if $InpVar eq "y"
  30.   skip start
  31. endif
  32.  
  33. echo "*n Unpacking aborted! I hope I see you again...*n"
  34. quit 
  35.  
  36. lab start
  37. echo "*e[1;1H*e[J"
  38. echo "*n*n Now, please enter the path where MagicWB should be unpacked to"
  39. echo " (a directory called 'MagicWB' will automatically be created in the"
  40. echo " path you have entered).*n"
  41. echo " The path MUST HAVE A TRAILING SLASH (/) at the end of the pathname!"
  42. echo " If not, it will not work! (If the destination is just a device/volume"
  43. echo " you certainly must only enter a colon (:) at the end of the name)*n*n"
  44.  
  45. lab PathRepeat
  46. echo noline " Please enter path: "
  47. set Path "[Return]"
  48. set > NIL: Path ?
  49. if not exists $Path
  50.   echo " Wrong path, '$Path' does not exist! Try again...*n"
  51.   skip back PathRepeat
  52. endif
  53. echo "*e[1;1H*e[J"    
  54. echo " MagicWB will be unpacked to the path '$Path'*n*n"
  55. :C/LHA -x x MagicWB.lha $Path
  56.  
  57. if warn 
  58.   echo "*n Unpacking failed! Please try again (check memory)."
  59.   wait 5
  60. else 
  61.   echo "*n MagicWB has been successfully unpacked to $Path."
  62.   echo " Please consult the documentation of MagicWB for further information."
  63.   echo "*n   [Return]"
  64.   set > NIL: Return ?
  65. endif
  66.  
  67. quit